home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 23
/
AMIGAplus Sonderheft 23 (2000)(Falke)(DE)[!].iso
/
Updates
/
Iconsets
/
Pio_Icon
/
Install
next >
Wrap
Text File
|
1999-11-27
|
1KB
|
50 lines
;
; PIO-Install
;
;(effect "center" "horizontal"
;; ( + ( * ( + ( * 256 46) 139) 256) 87)
;; ( + ( * ( + ( * 256 240) 255) 256) 255)
;$2e8b57
;$f0ffff
;)
(set #welcome ( cat "This script will install the icon plugin for PPaint. "
"The installation assumes that PPaint resides in the "
" directory assigned to PPAINT:.\n"
"\n __ "
"\n //_) "
"\n//__) WARE"
)
)
(message #welcome)
(welcome)
(complete 0)
(if (> @user-level 0)
(
(set #ppaint-dir
(askdir
(prompt "Please set the PPaint installation directory.")
(default "PPAINT:")
(help "No help available.")
)
)
(set #ppaint-setup
(askbool (prompt "Do you want to switch off PPaint's automatic icon generation ?")
(choices "Yes" "No")
(help "You have to turn off automatic generation of icons to enable the advanced features of the personal_icon_io.library.")
)
)
)
((set #ppaint-dir "PPAINT:") (set #ppaint-setup 1))
)
(set @default-dest #ppaint-dir)
(complete 35)
(copylib (source "library/personal_icon_io.library") (dest (tackon #ppaint-dir "libs")) )
(complete 70)
(if #ppaint-setup
((run "setenv EDITSCRIPT f/ICONS/e/1/0/w")
(run ("edit \"%s\" with ENV:EDITSCRIPT opt w160" (tackon #ppaint-dir "PPaint_Prefs/Startup_1.set")))
))
(complete 100)